home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The Arcade• / Scarab of Ra ••••• / Scarab of RA / Scarab of RA.rsrc / CODE_45.txt < prev    next >
Text File  |  1987-12-16  |  18KB  |  336 lines
  1. # near model CODE resource
  2. # jump table entries: 33481-33486 (6 of them)
  3. fn00000000:
  4. 00000000  4E56 FFFC                link       A6, -0x0004
  5. 00000004  302D E7F4                move.w     D0, [A5 - 0x180C]
  6. 00000008  48C0                     ext.l      D0
  7. 0000000A  E980                     asl        D0, 4
  8. 0000000C  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  9. 00000010  D1C0                     add.l      A0, D0
  10. 00000012  4879 0000 07CE           push.l     0x7CE
  11. 00000018  2D48 FFFC                move.l     [A6 - 0x4], A0
  12. 0000001C  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  13. 00000020  588F                     addq.l     A7, 4
  14. 00000022  3F00                     move.w     -[A7], D0
  15. 00000024  206E FFFC                movea.l    A0, [A6 - 0x4]
  16. 00000028  2F28 0008                move.l     -[A7], [A0 + 0x8]
  17. 0000002C  4EAD 00CA                jsr        [A5 + 0xCA /* export_21 */]
  18. 00000030  5C8F                     addq.l     A7, 6
  19. 00000032  4A80                     tst.l      D0
  20. 00000034  6704                     beq        +0x6 /* 0000003A */
  21. 00000036  7000                     moveq.l    D0, 0x00
  22. 00000038  6024                     bra        +0x26 /* 0000005E */
  23. label0000003A:
  24. 0000003A  206E 0008                movea.l    A0, [A6 + 0x8]
  25. 0000003E  0828 0001 0009           btst.b     [A0 + 0x9], 0x1
  26. 00000044  6704                     beq        +0x6 /* 0000004A */
  27. 00000046  7000                     moveq.l    D0, 0x00
  28. 00000048  6014                     bra        +0x16 /* 0000005E */
  29. label0000004A:
  30. 0000004A  3F3C 000F                move.w     -[A7], 0xF
  31. 0000004E  4EAD 0572                jsr        [A5 + 0x572 /* export_170 */]
  32. 00000052  548F                     addq.l     A7, 2
  33. 00000054  B06D E7FC                cmp.w      D0, [A5 - 0x1804]
  34. 00000058  5CC0                     sge        D0
  35. 0000005A  4400                     neg.b      D0
  36. 0000005C  4880                     ext.w      D0
  37. label0000005E:
  38. 0000005E  4E5E                     unlink     A6
  39. 00000060  4E75                     rts
  40. 00000062  5350                     subq.w     [A0], 1
  41. 00000064  5249                     addq.w     A1, 1
  42. 00000066  4E47                     trap       7
  43. 00000068  5452                     addq.w     [A2], 2
  44. export_93:
  45. fn0000006A:
  46. 0000006A  4E56 0000                link       A6, 0
  47. 0000006E  206E 0008                movea.l    A0, [A6 + 0x8]
  48. 00000072  08E8 0001 0009           bset.b     [A0 + 0x9], 0x1
  49. 00000078  206E 0008                movea.l    A0, [A6 + 0x8]
  50. 0000007C  08A8 0000 000A           bclr.b     [A0 + 0xA], 0x0
  51. 00000082  206E 0008                movea.l    A0, [A6 + 0x8]
  52. 00000086  7001                     moveq.l    D0, 0x01
  53. 00000088  1140 0006                move.b     [A0 + 0x6], D0
  54. 0000008C  4EBA 02B0                jsr        [PC + 0x2B0 /* 0000033E */]
  55. 00000090  4E5E                     unlink     A6
  56. 00000092  4E75                     rts
  57. 00000094  5452                     addq.w     [A2], 2
  58. 00000096  4950                     chk.w      D4, [A0]
  59. 00000098  2020                     move.l     D0, -[A0]
  60. 0000009A  2020                     move.l     D0, -[A0]
  61. export_91:
  62. 0000009C  4E56 0000                link       A6, 0
  63. 000000A0  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  64. 000000A4  4EBA FF5A                jsr        [PC - 0xA6 /* 00000000 */]
  65. 000000A8  588F                     addq.l     A7, 4
  66. 000000AA  4A40                     tst.w      D0
  67. 000000AC  6736                     beq        +0x38 /* 000000E4 */
  68. 000000AE  4879 0000 07D4           push.l     0x7D4
  69. 000000B4  4EAD 0502                jsr        [A5 + 0x502 /* export_156 */]
  70. 000000B8  588F                     addq.l     A7, 4
  71. 000000BA  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  72. 000000BE  4EBA FFAA                jsr        [PC - 0x56 /* 0000006A */]
  73. 000000C2  588F                     addq.l     A7, 4
  74. 000000C4  3F3C 000A                move.w     -[A7], 0xA /* '\n' */
  75. 000000C8  4EAD 0572                jsr        [A5 + 0x572 /* export_170 */]
  76. 000000CC  548F                     addq.l     A7, 2
  77. 000000CE  7214                     moveq.l    D1, 0x14
  78. 000000D0  9240                     sub.w      D1, D0
  79. 000000D2  4441                     neg.w      D1
  80. 000000D4  3F01                     move.w     -[A7], D1
  81. 000000D6  4EAD 04D2                jsr        [A5 + 0x4D2 /* export_150 */]
  82. 000000DA  548F                     addq.l     A7, 2
  83. 000000DC  4267                     clr.w      -[A7]
  84. 000000DE  4EAD 04CA                jsr        [A5 + 0x4CA /* export_149 */]
  85. 000000E2  548F                     addq.l     A7, 2
  86. label000000E4:
  87. 000000E4  4E5E                     unlink     A6
  88. 000000E6  4E75                     rts
  89. 000000E8  5350                     subq.w     [A0], 1
  90. 000000EA  4541                     chk.w      D2, D1
  91. 000000EC  5254                     addq.w     [A4], 1
  92. 000000EE  5241                     addq.w     D1, 1
  93. export_94:
  94. 000000F0  4E56 FFFC                link       A6, -0x0004
  95. 000000F4  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  96. 000000F8  4EBA FF06                jsr        [PC - 0xFA /* 00000000 */]
  97. 000000FC  588F                     addq.l     A7, 4
  98. 000000FE  4A40                     tst.w      D0
  99. 00000100  6746                     beq        +0x48 /* 00000148 */
  100. 00000102  4879 0000 0800           push.l     0x800
  101. 00000108  4EAD 0502                jsr        [A5 + 0x502 /* export_156 */]
  102. 0000010C  588F                     addq.l     A7, 4
  103. 0000010E  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  104. 00000112  4EBA FF56                jsr        [PC - 0xAA /* 0000006A */]
  105. 00000116  588F                     addq.l     A7, 4
  106. 00000118  4A2D E819                tst.b      [A5 - 0x17E7]
  107. 0000011C  672A                     beq        +0x2C /* 00000148 */
  108. 0000011E  4879 0000 082A           push.l     0x82A
  109. 00000124  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  110. 00000128  588F                     addq.l     A7, 4
  111. 0000012A  3F00                     move.w     -[A7], D0
  112. 0000012C  2F2D E018                move.l     -[A7], [A5 - 0x1FE8]
  113. 00000130  4EAD 00CA                jsr        [A5 + 0xCA /* export_21 */]
  114. 00000134  5C8F                     addq.l     A7, 6
  115. 00000136  2D40 FFFC                move.l     [A6 - 0x4], D0
  116. 0000013A  4A80                     tst.l      D0
  117. 0000013C  670A                     beq        +0xC /* 00000148 */
  118. 0000013E  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  119. 00000142  4EAD 03CA                jsr        [A5 + 0x3CA /* export_117 */]
  120. 00000146  588F                     addq.l     A7, 4
  121. label00000148:
  122. 00000148  4E5E                     unlink     A6
  123. 0000014A  4E75                     rts
  124. 0000014C  5749                     subq.w     A1, 3
  125. 0000014E  4E44                     trap       4
  126. 00000150  5452                     addq.w     [A2], 2
  127. 00000152  4150                     chk.w      D0, [A0]
  128. export_90:
  129. 00000154  4E56 0000                link       A6, 0
  130. 00000158  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  131. 0000015C  4EBA FEA2                jsr        [PC - 0x15E /* 00000000 */]
  132. 00000160  588F                     addq.l     A7, 4
  133. 00000162  4A40                     tst.w      D0
  134. 00000164  6734                     beq        +0x36 /* 0000019A */
  135. 00000166  4879 0000 0830           push.l     0x830
  136. 0000016C  4EAD 0502                jsr        [A5 + 0x502 /* export_156 */]
  137. 00000170  588F                     addq.l     A7, 4
  138. 00000172  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  139. 00000176  4EBA FEF2                jsr        [PC - 0x10E /* 0000006A */]
  140. 0000017A  588F                     addq.l     A7, 4
  141. 0000017C  3F3C FFFB                move.w     -[A7], 0xFFFB
  142. 00000180  4EAD 04D2                jsr        [A5 + 0x4D2 /* export_150 */]
  143. 00000184  548F                     addq.l     A7, 2
  144. 00000186  3F3C 004B                move.w     -[A7], 0x4B /* 'K' */
  145. 0000018A  42A7                     clr.l      -[A7]
  146. 0000018C  486D 0452                pea.l      [A5 + 0x452 /* export_134 */]
  147. 00000190  42A7                     clr.l      -[A7]
  148. 00000192  4EAD 0082                jsr        [A5 + 0x82 /* export_12 */]
  149. 00000196  4FEF 000E                lea.l      A7, [A7 + 0xE]
  150. label0000019A:
  151. 0000019A  4E5E                     unlink     A6
  152. 0000019C  4E75                     rts
  153. 0000019E  4441                     neg.w      D1
  154. 000001A0  5254                     addq.w     [A4], 1
  155. 000001A2  5452                     addq.w     [A2], 2
  156. 000001A4  4150                     chk.w      D0, [A0]
  157. export_92:
  158. 000001A6  4E56 FFFE                link       A6, -0x0002
  159. 000001AA  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  160. 000001AE  4EBA FE50                jsr        [PC - 0x1B0 /* 00000000 */]
  161. 000001B2  588F                     addq.l     A7, 4
  162. 000001B4  4A40                     tst.w      D0
  163. 000001B6  6700 00B6                beq        +0xB8 /* 0000026E */
  164. 000001BA  4879 0000 0856           push.l     0x856
  165. 000001C0  4EAD 0502                jsr        [A5 + 0x502 /* export_156 */]
  166. 000001C4  588F                     addq.l     A7, 4
  167. 000001C6  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  168. 000001CA  4EBA FE9E                jsr        [PC - 0x162 /* 0000006A */]
  169. 000001CE  588F                     addq.l     A7, 4
  170. 000001D0  4AAD 9B64                tst.l      [A5 - 0x649C]
  171. 000001D4  670C                     beq        +0xE /* 000001E2 */
  172. 000001D6  2F2D 9B64                move.l     -[A7], [A5 - 0x649C]
  173. 000001DA  4EAD 01FA                jsr        [A5 + 0x1FA /* export_59 */]
  174. 000001DE  42AD 9B64                clr.l      [A5 - 0x649C]
  175. label000001E2:
  176. 000001E2  7001                     moveq.l    D0, 0x01
  177. 000001E4  3D40 FFFE                move.w     [A6 - 0x2], D0
  178. 000001E8  6000 006A                bra        +0x6C /* 00000254 */
  179. label000001EC:
  180. 000001EC  302E FFFE                move.w     D0, [A6 - 0x2]
  181. 000001F0  48C0                     ext.l      D0
  182. 000001F2  E980                     asl        D0, 4
  183. 000001F4  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  184. 000001F8  D1C0                     add.l      A0, D0
  185. 000001FA  08A8 0001 0002           bclr.b     [A0 + 0x2], 0x1
  186. 00000200  302E FFFE                move.w     D0, [A6 - 0x2]
  187. 00000204  48C0                     ext.l      D0
  188. 00000206  E980                     asl        D0, 4
  189. 00000208  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  190. 0000020C  D1C0                     add.l      A0, D0
  191. 0000020E  08A8 0005 0002           bclr.b     [A0 + 0x2], 0x5
  192. 00000214  302E FFFE                move.w     D0, [A6 - 0x2]
  193. 00000218  48C0                     ext.l      D0
  194. 0000021A  E980                     asl        D0, 4
  195. 0000021C  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  196. 00000220  D1C0                     add.l      A0, D0
  197. 00000222  4AA8 000C                tst.l      [A0 + 0xC]
  198. 00000226  6728                     beq        +0x2A /* 00000250 */
  199. 00000228  302E FFFE                move.w     D0, [A6 - 0x2]
  200. 0000022C  48C0                     ext.l      D0
  201. 0000022E  E980                     asl        D0, 4
  202. 00000230  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  203. 00000234  D1C0                     add.l      A0, D0
  204. 00000236  2F28 000C                move.l     -[A7], [A0 + 0xC]
  205. 0000023A  4EAD 01FA                jsr        [A5 + 0x1FA /* export_59 */]
  206. 0000023E  302E FFFE                move.w     D0, [A6 - 0x2]
  207. 00000242  48C0                     ext.l      D0
  208. 00000244  E980                     asl        D0, 4
  209. 00000246  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  210. 0000024A  D1C0                     add.l      A0, D0
  211. 0000024C  42A8 000C                clr.l      [A0 + 0xC]
  212. label00000250:
  213. 00000250  526E FFFE                addq.w     [A6 - 0x2], 1
  214. label00000254:
  215. 00000254  302D E804                move.w     D0, [A5 - 0x17FC]
  216. 00000258  C1ED E806                muls.w     D0, [A5 - 0x17FA]
  217. 0000025C  B06E FFFE                cmp.w      D0, [A6 - 0x2]
  218. 00000260  6E8A                     bgt        -0x74 /* 000001EC */
  219. 00000262  4A6D E7F4                tst.w      [A5 - 0x180C]
  220. 00000266  6706                     beq        +0x8 /* 0000026E */
  221. 00000268  7001                     moveq.l    D0, 0x01
  222. 0000026A  1B40 E81A                move.b     [A5 - 0x17E6], D0
  223. label0000026E:
  224. 0000026E  4E5E                     unlink     A6
  225. 00000270  4E75                     rts
  226. 00000272  5741                     subq.w     D1, 3
  227. 00000274  5445                     addq.w     D5, 2
  228. 00000276  5254                     addq.w     [A4], 1
  229. 00000278  5241                     addq.w     D1, 1
  230. export_89:
  231. 0000027A  4E56 FFFE                link       A6, -0x0002
  232. 0000027E  70FF                     moveq.l    D0, 0xFFFFFFFF
  233. 00000280  3B40 FED2                move.w     [A5 - 0x12E], D0
  234. 00000284  426E FFFE                clr.w      [A6 - 0x2]
  235. 00000288  6000 009E                bra        +0xA0 /* 00000328 */
  236. label0000028C:
  237. 0000028C  302E FFFE                move.w     D0, [A6 - 0x2]
  238. 00000290  D040                     add.w      D0, D0
  239. 00000292  C1FC 0006                muls.w     D0, 0x6
  240. 00000296  41ED FED4                lea.l      A0, [A5 - 0x12C]
  241. 0000029A  D1C0                     add.l      A0, D0
  242. 0000029C  302E FFFE                move.w     D0, [A6 - 0x2]
  243. 000002A0  C1FC 0064                muls.w     D0, 0x64 /* 'd' */
  244. 000002A4  0640 1F40                addi.w     D0, 0x1F40
  245. 000002A8  3080                     move.w     [A0], D0
  246. 000002AA  302E FFFE                move.w     D0, [A6 - 0x2]
  247. 000002AE  D040                     add.w      D0, D0
  248. 000002B0  C1FC 0006                muls.w     D0, 0x6
  249. 000002B4  41ED FED4                lea.l      A0, [A5 - 0x12C]
  250. 000002B8  D1C0                     add.l      A0, D0
  251. 000002BA  302E FFFE                move.w     D0, [A6 - 0x2]
  252. 000002BE  C1FC 000A                muls.w     D0, 0xA /* '\n' */
  253. 000002C2  323C 00F1                move.w     D1, 0xF1
  254. 000002C6  9240                     sub.w      D1, D0
  255. 000002C8  3141 0002                move.w     [A0 + 0x2], D1
  256. 000002CC  302E FFFE                move.w     D0, [A6 - 0x2]
  257. 000002D0  D040                     add.w      D0, D0
  258. 000002D2  C1FC 0006                muls.w     D0, 0x6
  259. 000002D6  41ED FED4                lea.l      A0, [A5 - 0x12C]
  260. 000002DA  D1C0                     add.l      A0, D0
  261. 000002DC  7001                     moveq.l    D0, 0x01
  262. 000002DE  3140 0004                move.w     [A0 + 0x4], D0
  263. 000002E2  302E FFFE                move.w     D0, [A6 - 0x2]
  264. 000002E6  D040                     add.w      D0, D0
  265. 000002E8  5240                     addq.w     D0, 1
  266. 000002EA  C1FC 0006                muls.w     D0, 0x6
  267. 000002EE  41ED FED4                lea.l      A0, [A5 - 0x12C]
  268. 000002F2  D1C0                     add.l      A0, D0
  269. 000002F4  4250                     clr.w      [A0]
  270. 000002F6  302E FFFE                move.w     D0, [A6 - 0x2]
  271. 000002FA  D040                     add.w      D0, D0
  272. 000002FC  5240                     addq.w     D0, 1
  273. 000002FE  C1FC 0006                muls.w     D0, 0x6
  274. 00000302  41ED FED4                lea.l      A0, [A5 - 0x12C]
  275. 00000306  D1C0                     add.l      A0, D0
  276. 00000308  4268 0002                clr.w      [A0 + 0x2]
  277. 0000030C  302E FFFE                move.w     D0, [A6 - 0x2]
  278. 00000310  D040                     add.w      D0, D0
  279. 00000312  5240                     addq.w     D0, 1
  280. 00000314  C1FC 0006                muls.w     D0, 0x6
  281. 00000318  41ED FED4                lea.l      A0, [A5 - 0x12C]
  282. 0000031C  D1C0                     add.l      A0, D0
  283. 0000031E  7001                     moveq.l    D0, 0x01
  284. 00000320  3140 0004                move.w     [A0 + 0x4], D0
  285. 00000324  526E FFFE                addq.w     [A6 - 0x2], 1
  286. label00000328:
  287. 00000328  0C6E 0019 FFFE           cmpi.w     [A6 - 0x2], 0x19
  288. 0000032E  6D00 FF5C                blt        -0xA2 /* 0000028C */
  289. 00000332  4E5E                     unlink     A6
  290. 00000334  4E75                     rts
  291. 00000336  5452                     addq.w     [A2], 2
  292. 00000338  534E                     subq.w     A6, 1
  293. 0000033A  4449                     neg.w      A1
  294. 0000033C  4E49                     trap       9
  295. fn0000033E:
  296. 0000033E  4E56 FFF8                link       A6, -0x0008
  297. 00000342  4A2D E81F                tst.b      [A5 - 0x17E1]
  298. 00000346  6600 005A                bne        +0x5C /* 000003A2 */
  299. 0000034A  486E FFFC                pea.l      [A6 - 0x4]
  300. 0000034E  4EAD 0212                jsr        [A5 + 0x212 /* export_62 */]
  301. 00000352  4A6E FFFC                tst.w      [A6 - 0x4]
  302. 00000356  663C                     bne        +0x3E /* 00000394 */
  303. 00000358  426E FFFE                clr.w      [A6 - 0x2]
  304. 0000035C  602C                     bra        +0x2E /* 0000038A */
  305. label0000035E:
  306. 0000035E  4267                     clr.w      -[A7]
  307. 00000360  A94C                     syscall    FlashMenuBar
  308. 00000362  4878 0006                push.l     0x6
  309. 00000366  486E FFF8                pea.l      [A6 - 0x8]
  310. 0000036A  4EAD 021A                jsr        [A5 + 0x21A /* export_63 */]
  311. 0000036E  4267                     clr.w      -[A7]
  312. 00000370  A94C                     syscall    FlashMenuBar
  313. 00000372  0C6E 0002 FFFE           cmpi.w     [A6 - 0x2], 0x2
  314. 00000378  6C0C                     bge        +0xE /* 00000386 */
  315. 0000037A  4878 0006                push.l     0x6
  316. 0000037E  486E FFF8                pea.l      [A6 - 0x8]
  317. 00000382  4EAD 021A                jsr        [A5 + 0x21A /* export_63 */]
  318. label00000386:
  319. 00000386  526E FFFE                addq.w     [A6 - 0x2], 1
  320. label0000038A:
  321. 0000038A  0C6E 0003 FFFE           cmpi.w     [A6 - 0x2], 0x3
  322. 00000390  6DCC                     blt        -0x32 /* 0000035E */
  323. 00000392  600E                     bra        +0x10 /* 000003A2 */
  324. label00000394:
  325. 00000394  486D FED2                pea.l      [A5 - 0x12E]
  326. 00000398  4878 012E                push.l     0x12E
  327. 0000039C  42A7                     clr.l      -[A7]
  328. 0000039E  4EAD 020A                jsr        [A5 + 0x20A /* export_61 */]
  329. label000003A2:
  330. 000003A2  4E5E                     unlink     A6
  331. 000003A4  4E75                     rts
  332. 000003A6  5452                     addq.w     [A2], 2
  333. 000003A8  4150                     chk.w      D0, [A0]
  334. 000003AA  534F                     subq.w     A7, 1
  335. 000003AC  554E                     subq.w     A6, 2
  336.